﻿Public Class FormRoomInfo
    Dim DAFloor As New DSFloorManagemantTableAdapters.FLOORSTableAdapter
    Dim DACategory As New DSFloorManagemantTableAdapters.ROOM_CATEGORYTableAdapter
    Dim DARoom As New DSFloorManagemantTableAdapters.ROOMSTableAdapter
    Sub New()

        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        With CboCategoryRoom
            .DataSource = DACategory.GetData
            .ValueMember = "CATEGORY_ID"
            .DisplayMember = "GATEGORY_NAME"
            .SelectedIndex = -1
        End With

        With CboFloor
            .DataSource = DAFloor.GetData
            .ValueMember = "FLOOR_ID"
            .DisplayMember = "FLOOR_NAME"
            .SelectedIndex = -1
        End With
        ' Add any initialization after the InitializeComponent() call.

    End Sub

    Private Sub BtnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOk.Click
        Me.Close()
    End Sub
End Class